﻿Imports SanDauGia.DAL.SanDauGiaTableAdapters
Public Class Products
    Public Shared Function LoadSanPhamTheoDanhMuc(ByVal MaDanhMuc As Integer) As DataTable
        Dim dt As New DataTable
        If MaDanhMuc <> Nothing Then
            Dim sp As New SANPHAMTableAdapter
            dt = sp.GetDataByLoadSanPhamTheoDanhMuc(MaDanhMuc)
        End If
        Return dt
    End Function
End Class
